home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Belgian Amiga Club - ADF Collection
/
BS1 part 27.zip
/
BS1 part 27
/
ImageMaster_d1.adf
/
print-docs
< prev
next >
Wrap
Text File
|
1992-10-05
|
3KB
|
91 lines
; CBM installer script to install Imagemaster on users hard-drive
; Written: August 28th, 1992
; Last update: October 5th, 1992
; by: Ben Williams
;----------------------------------------------------------------
; This bypasses the final dir text
;---------------------------------
(set @default-dest "")
; This bypassess the entry text
; In a tricky manner... "welcome"
; intentionally NEVER gets executed
;----------------------------------
(set foo 1)
(if (= foo 0)
(welcome)
)
; We'll need our compressed-file extraction command:
;---------------------------------------------------
(set src_disk "IM_Install2")
(askdisk
(prompt ("Please insert the %s diskette" src_disk))
(help "We need to copy some files from this diskette.")
(dest src_disk)
)
; Get the extractor
;------------------
(copyfiles (source (cat src_disk ":"))
(dest "ram:")
(pattern "extract")
(files)
)
; We'll need our compressed-file extraction command:
;---------------------------------------------------
(set src_disk "IM_Install4")
(askdisk
(prompt ("Please insert the %s diskette" src_disk))
(help "We need to copy some files from this diskette.")
(dest src_disk)
)
; Get the archive from disk four
;--------------------------------
(copyfiles (source (cat src_disk ":"))
(dest "ram:")
(pattern "ia.lzh")
(files)
)
; Create the actual doc file
;---------------------------
(makedir "ram:gbzyx")
(run "ram:extract >con:0/50/640/100/extract -m e ram:ia ram:gbzyx/")
; Warn user this will take a while
;---------------------------------
(message "You have started the process that prints the manual "
"addendum to your printer. This will take considerable "
"time, as this addendum is over 100 pages long. If you "
"do not wish to print the addendum, abort this operation "
"right now. Note that this addendum will be replaced by "
"an up to date manual within a few months - this is only "
"an interim measure."
)
; Print it!
;----------
(run "type ram:gbzyx/i_addendum to prt:")
; Clean Up
;---------
(delete "ram:ia.lzh")
(run "delete ram:gbzyx ALL QUIET")
; No exit by the book because we don't want the "installed" message
;------------------------------------------------------------------
(message "The addendum to the Imagemaster manual has been sent to "
"your printer. This addendum has a table of contents and "
"an index; be certain to use these as they will help you "
"a great deal. Note that this addendum will be replaced "
"by a more detailed manual in the future; for now, we're "
"providing this to cover you while we write the next one."
)
(exit (quiet))